home *** CD-ROM | disk | FTP | other *** search
/ Hyper Stacks 1994 May / Hyper Stacks (Pacific HiTech)(1994)[Mac].iso / Science / Astronomy / Sol'sNeighbors / background_19271.txt < prev    next >
Encoding:
Text File  |  1989-01-09  |  1.0 KB  |  52 lines
  1. -- background: 19271 from stack: in
  2. -- bmap block id: 32608
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: StarLoc
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: A003
  11. -- rect: left=68 top=291 right=311 bottom=154
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Erase Plot
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   global seeCard
  23.   put 0 into seeCard
  24.   choose select tool
  25.   drag from 0,0 to 512,341
  26.   doMenu "Clear Picture"
  27.   choose browse tool
  28.   put empty into card field Name
  29.   pop card
  30. end mouseUp
  31.  
  32.  
  33.  
  34. -- part 2 (button)
  35. -- low flags: 00
  36. -- high flags: A003
  37. -- rect: left=348 top=292 right=312 bottom=431
  38. -- title width / last selected line: 0
  39. -- icon id / first selected line: 0 / 0
  40. -- text alignment: 1
  41. -- font id: 0
  42. -- text size: 12
  43. -- style flags: 0
  44. -- line height: 16
  45. -- part name: Return
  46. ----- HyperTalk script -----
  47. on mouseDown
  48.   global seeCard
  49.   put 0 into seeCard
  50.   pop card
  51. end mouseDown
  52.